home *** CD-ROM | disk | FTP | other *** search
/ The Arsenal Files 6 / The Arsenal Files 6 (Arsenal Computer).ISO / os2bbs / grf4mx14.zip / GRAFITTI.MEC < prev   
INI File  |  1996-02-28  |  5KB  |  114 lines
  1. [comment
  2.                                   Version 1.04
  3.      GRAFITTI for MAXIMUS 3.x - COPYRIGHT 1996 by JOHN MEDLAND, PHOTO 334 BBS!
  4.                TORONTO, CANADA, (416) 539-9591, FIDONET 1:/250/840
  5. ]
  6. [moreoff]
  7. [/L0][cls][white]
  8.  
  9. [red] ╔═════[lightcyan on blue]▒▒▒▒▒▒▒▒[lightcyan]▄[red]══════════════════════════════════════════════════════════════╗
  10.  ║ [lightcyan on blue]    ▒▒█▀▀▀▀▀▀ ┌──────┐                         ▄▄▄▄▄▄▄          ╓───┐     [red] ║
  11.  ║ [lightcyan on blue]    ▒▒█       │ ┌──┐ │ █▀▀▀▀▀▀█          ▒▒▒▒▄ █▄▄ ▄▄█          ╙╖ ┌┘     [red] ║
  12.  ║ [lightcyan on blue]    ▒▒█ ▒▒▒▒▄ │ └──┘ │ █ █▀▀█ █ ╦═════╗   ▒▒█▀   █ █   ▄▄▄▄▄▄▄   ║ │      [red] ║
  13.  ║ [lightcyan on blue]    ▒▒█  ▀▒▒█ │ ┌─┐ ┌┘ █ ▀▀▀▀ █ ║         ▒▒█    █ █   █▄▄ ▄▄█   ║ │      [red] ║
  14.  ║ [lightcyan on blue]    ▒▒█   ▒▒█ │ │ │ └┐ █ █▀▀█ █ ╠══       ▒▒█    █ █     █ █    ╓╜ └┐     [red] ║
  15.  ║ [lightcyan on blue]    ▒▒▒▒▒▒▒▒█ └─┘ └──┘ █ █  █ █ ║        ▒▒▒▒█   █▄█     █ █    ╙───┘     [red] ║
  16.  ║ [lightcyan on blue]     ▀▀▀▀▀▀▀▀          ▀▀▀  ▀▀▀ ╩         ▀▀▀▀           █ █              [red] ║
  17.  ╚══════════════════════════════════════════════════════════[lightcyan on blue]█▄█[red]═══════════════╝
  18.  
  19.                              [lightcyan]──┤ [yellow]GRAF4MAX v1.04 [lightcyan]├──
  20.  
  21. [green]       Witticisms, Jokes, Pet Peeves, Clever Remarks, and Cosmic Insights.
  22.  
  23.                                [yellow]R[white])[gray]ead the Grafitti
  24.                                [yellow]W[white])[gray]rite some Grafitti
  25. [islocal][sequal]                               [yellow]E[white])[gray]dit Grafitti file
  26.                                [yellow]Q[white])[gray]uit
  27.  
  28.  
  29. [CLEAR_STACKED][isremote][white]Select: [cyan][menu]WRQ
  30. [islocal][sbelow][sxclude][white]Select: [cyan][menu]WRQ
  31. [islocal][sequal][white]Select: [cyan][menu]WRQE
  32. [islocal][sequal][choice]e[cls][xtern_dos]Q misc\grafitti.dat
  33. [sequal][choice]e[goto L0]
  34. [choice]W[goto L1]
  35. [choice]Q[cls][quit]
  36.  
  37. [cls]
  38. [white][link]misc\grafitti.dat
  39. [goto L0]
  40. [/L1][up red]Working..[blink].[white][open]misc\grafitti.tmp
  41. [write][cls][locate  2  1][sline][sxclude] *-- This line begins comment --*
  42. [write][down][white]════════════════════════════════════════════════════════════════════════════════[cyan]
  43. [open]nul:
  44. [open]misc\grafdate.bat
  45. [write]@ECHO OFF
  46. [write]VER|DATE|FIND "Current" > GRAFTMP$.BAT
  47. [write]ECHO SET Y4GF=%%%%3 >> CURRENT.BAT
  48. [write]ECHO SET T4GF=%%%%4 >> CURRENT.BAT
  49. [write]CALL GRAFTMP$.BAT
  50. [write]DEL GRAFTMP$.BAT
  51. [write]DEL CURRENT.BAT
  52. [write]ECHO                                           Posted on %%Y4GF%%%%T4GF%% >>misc\GRAFITTI.TMP
  53. [write]SET Y4GF=
  54. [write]SET T4GF=
  55. [open]nul:
  56. [Xtern_dos]COMMAND /E:512 /Cmisc\grafdate.bat
  57. [delete]misc\grafdate.bat
  58. [link]misc\grafitti.tmp
  59. [colour][locate 15  1][white]════════════════════════════════════════════════════════════════════════════════[locate  7  1][endcolor]
  60. [nocolour]Please write your comment now.   <ENTER> on the 5th line when done.[endcolor]
  61. [open]misc\grafitti.tmp
  62. [write]
  63. [colour][up][white]1.
  64. [white]2.
  65. [white]3.
  66. [white]4.
  67. [white]5.[endcolor]
  68. [colour][up][up][up][up][up]                                                                              [grey]<
  69. [up][endcolour][white]1. [cyan][clear_stacked][readln]
  70. [ifentered] [write]:
  71. [colour]                                                                              [grey]<
  72. [up][endcolour][white]2. [cyan][readln]
  73. [ifentered] [write]:
  74. [colour]                                                                              [grey]<
  75. [up][endcolour][white]3. [cyan][readln]
  76. [ifentered] [write]:
  77. [colour]                                                                              [grey]<
  78. [up][endcolour][white]4. [cyan][readln]
  79. [ifentered] [write]:
  80. [colour]                                                                              [grey]<
  81. [up][endcolour][white]5. [cyan][readln]
  82. [ifentered] [write]:
  83. [write]
  84.  
  85.  
  86. [white]════════════════════════════════════════════════════════════════════════════════[cyan]
  87.  
  88. [cyan]Save this comment? [white][[Y,n] [menu]Yn|
  89. [choice]N[open]nul:
  90. [choice]N[delete]MISC\GRAFITTI.tmp
  91. [choice]N[down white]Deleted![pause][pause][goto L0]
  92.  
  93. [cyan]Would you like to remain anonymous? [white][[Y,n] [menu]Yn|
  94. [choice]n[write][white]                                          -- %n
  95. [choice]n[write]
  96. [choice]n[write][white]════════════════════════════════════════════════════════════════════════════════[cyan]
  97. [choice]n[write]
  98. [choice]n[write][white][more]
  99. [choice]n[goto L2]
  100. [write][white]                                          -- Anonymous
  101. [write][black][colour]                                        -- %n  [endcolor]
  102. [write][white]════════════════════════════════════════════════════════════════════════════════[cyan]
  103. [write]
  104. [write][white][more]
  105. [/L2]
  106. [red]Working..[blink].[white]
  107. [open]nul:
  108. [dos]copy misc\grafitti.tmp+misc\grafitti.dat misc\graf.tmp>nul
  109. [dos]copy misc\graf.tmp misc\grafitti.dat>nul
  110. [delete]misc\grafitti.tmp
  111. [delete]misc\graf.tmp
  112. [log]+Posted some GRAFITTI
  113. [up cleol white]Saved![pause][cls][goto L0]
  114.